---------------------------------------------------------------------------
-- 2024/01/18 09:16:28
-- 06_黒_駅_朝_p0■
---------------------------------------------------------------------------
return function()

alldel()








capture()
set(BG,"view_042.png")
setEx(1,"KuroBase-02.png","KuroFacial-09-worried04.png","non.png",1,900,110)
fade(0.8)
winopen(0.5)


::block_00001::
cls1()
setname("透")
text("「电车好像稍微晚了一点啊。」")


::block_00002::
cls1()
noname()
text("和黑一起在车站的站台上等电车，随口嘟囔着。")


::block_00003::
cls1()
noname()
text("至于重要的黑，从刚才开始就因为紧张而脸色发青。")


::block_00004::
cls1()
setname("透")
text("「黑，没事吧？」")


fade_set(C2,"KuroFacial-09-worried02.png",0.3)


::block_00005::
cls1()
setname("黑")
playVoice("KU_0610_0000.ogg")
text("「没、没事……」")


::block_00006::
cls1()
setname("透")
text("「……」")


::block_00007::
cls1()
noname()
text("看起来不太像没事。得小心点。")


::block_00008::
cls1()
noname()
text("这样想着，我和黑一起上了稍微晚到的电车。")


winclose(0.5)
TransitionCapture()
alldel()
set(EV,"black.png")
TransitionCrossfade("mask21.png",0.8)
wait(0.8)


TransitionCapture()
alldel()
set(EV,"ev-H-kuro002_005.png")
TransitionCrossfade("mask21.png",0.8)
wait(0.8)
playSe("train_005.ogg")
winopen(0.5)

playBgm("icyalove_11.ogg")
playSe("se_Shinkansen-Running01-1_1.ogg",true)


::block_00009::
cls1()
setname("黑")
playVoice("KU_0610_0001.ogg")
text("（呼……呼……）")


::block_00010::
cls1()
noname()
text("果然不出所料，刚开车不久，黑就紧张起来了。")


::block_00011::
cls1()
noname()
text("黑的呼吸变得急促，开始微微颤抖。")


::block_00012::
cls1()
noname()
text("这样下去不妙。我得……想办法才行。")


winclose(0.5)

::block_00013::
item={}
item[1]="頭を撫でる"
item[2]="落ち着くように囁く"
item[3]="バードキス"
item[4]="胸を揉む"
cls1()
noname()
text("选项1：摸摸头    选项2：低声安慰她冷静下来\n选项3：轻吻她的嘴唇    选项4：揉她的胸\n")
sel("",item)
ret=get_sel_result()
InmoSyuzinko = InmoSyuzinko + getInmo('A',1,item[ret])
if ret==1 then goto block_00014 end
if ret==2 then goto block_00024 end
if ret==3 then goto block_00033 end
if ret==4 then goto block_00044 end


::block_00014::
capture()
alldel()
set(EV,"ev-H-kuro002_001.png")
sets(EV,1.5,1.5)
setp(EV,-960,0)
fade(0.5)
winopen(0.5)


::block_00015::
cls1()
setname("透")
text("（放松……放松点）")


::block_00016::
cls1()
setname("黑")
playVoice("KU_0614_0002.ogg")
text("（啊……）")


::block_00017::
cls1()
noname()
text("轻轻抚摸着微微颤抖的黑的头。")


::block_00018::
cls1()
noname()
text("希望这样能让她平静下来……。")


::block_00019::
cls1()
setname("透")
text("（怎么样？）")


capture()
alldel()
set(EV,"ev-H-kuro002_002.png")
sets(EV,1.5,1.5)
setp(EV,-960,0)
fade(0.3)


::block_00020::
cls1()
setname("黑")
playVoice("KU_0614_0003.ogg")
text("（有点……嗯嗯……舒服……嗯嗯……）")


::block_00021::
cls1()
noname()
text("太好了。看来多少有些效果。")


::block_00022::
cls1()
noname()
text("不过，这样可能还是不够。")


::block_00023::
goto block_00052 --共通へ


::block_00024::
capture()
alldel()
set(EV,"ev-H-kuro002_005.png")
sets(EV,1.5,1.5)
setp(EV,-960,0)
fade(0.5)
winopen(0.5)


::block_00025::
cls1()
setname("透")
text("（冷静点……没事的）")


::block_00026::
cls1()
setname("黑")
playVoice("KU_0614_0004.ogg")
text("（嗯、嗯）")


::block_00027::
cls1()
noname()
text("在黑的耳边低声说道。")


::block_00028::
cls1()
noname()
text("要是这样能让她冷静下来就好了……。")


::block_00029::
cls1()
setname("黑")
playVoice("KU_0614_0005.ogg")
text("（哈……呼……呜呜……）")


::block_00030::
cls1()
noname()
text("黑的呼吸仍然急促。果然，光是低声说话效果不大吗……。")


::block_00031::
cls1()
noname()
text("至少，应该碰触到某个地方吧。")


::block_00032::
goto block_00052 --共通へ


::block_00033::
capture()
alldel()
set(EV,"ev-H-kuro002_005.png")
sets(EV,1.5,1.5)
setp(EV,-960,0)
fade(0.5)
winopen(0.5)


::block_00034::
cls1()
setname("透")
text("（黑……看这边）")


::block_00035::
cls1()
setname("黑")
playVoice("KU_0614_0006.ogg")
text("（诶？……嗯）")


::block_00036::
cls1()
noname()
text("轻轻地吻了黑的嘴唇。")


::block_00037::
cls1()
noname()
text("黑果然有些惊讶，但很快露出了陶醉的表情。")


::block_00038::
cls1()
setname("黑")
playVoice("KU_0614_0007.ogg")
text("（嗯……嗯，啾……）")


::block_00039::
cls1()
setname("透")
text("（……不讨厌吗？）")


::block_00040::
cls1()
setname("黑")
playVoice("KU_0614_0008.ogg")
text("（不讨厌）")


::block_00041::
cls1()
setname("透")
text("（那，再多一点……）")


::block_00042::
cls1()
setname("黑")
playVoice("KU_0614_0009.ogg")
text("（嗯，噗……啾……）")


::block_00043::
goto block_00052 --共通へ


::block_00044::
capture()
alldel()
set(EV,"ev-H-kuro002_005.png")
sets(EV,1.5,1.5)
setp(EV,-960,0)
fade(0.5)
winopen(0.5)


::block_00045::
cls1()
setname("黑")
playVoice("KU_0614_0010.ogg")
text("呼，啊……")


::block_00046::
cls1()
noname()
text("隔着衣服揉了揉黑的胸部。")


::block_00047::
cls1()
setname("黑")
playVoice("KU_0614_0011.ogg")
text("在这种地方……")


::block_00048::
cls1()
setname("透")
text("我觉得如果没有这种程度的刺激，症状是无法抑制的")


::block_00049::
cls1()
setname("黑")
playVoice("KU_0614_0012.ogg")
text("嗯，呼……也许是吧……")


::block_00050::
cls1()
setname("透")
text("（黑的奶子，真软啊）")


::block_00051::
cls1()
setname("黑")
playVoice("KU_0614_0013.ogg")
text("（哈……很有弹性，被揉捏着……啊……感觉，好舒服）")


::block_00052::

winclose(0.5)

::block_00053::
item={}
item[1]="頭を撫でる"
item[2]="背中を撫でる"
item[3]="ディープキス"
item[4]="乳首をいじる"
cls1()
noname()
text("选项1：抚摸头部    选项2：抚摸背部\n选项3：深吻    选项4：玩弄乳头\n")
sel("",item)
ret=get_sel_result()
InmoSyuzinko = InmoSyuzinko + getInmo('A',2,item[ret])
if ret==1 then goto block_00054 end
if ret==2 then goto block_00064 end
if ret==3 then goto block_00074 end
if ret==4 then goto block_00081 end


::block_00054::

::block_00055::
cls1()
setname("透")
text("（黑……你很努力了）")


capture()
alldel()
set(EV,"ev-H-kuro002_007.png")
sets(EV,1.5,1.5)
setp(EV,-960,0)
fade(0.3)
winopen(0.5)


::block_00056::
cls1()
setname("黑")
playVoice("KU_0614_0014.ogg")
text("（啊……）")


::block_00057::
cls1()
noname()
text("慢慢地，轻轻地抚摸黑的头，她露出了有些害羞的表情。")


::block_00058::
cls1()
setname("透")
text("（稍微平静点了吗？）")


::block_00059::
cls1()
setname("黑")
playVoice("KU_0614_0015.ogg")
text("（嗯……好像渐渐平静下来了……）")


::block_00060::
cls1()
noname()
text("仅仅是抚摸头部，似乎也有些效果。")


::block_00061::
cls1()
setname("透")
text("（好，好……）")


::block_00062::
cls1()
setname("黑")
playVoice("KU_0614_0016.ogg")
text("（哈……啊……）")


::block_00063::
goto block_00088 --共通へ


::block_00064::
capture()
alldel()
set(EV,"ev-H-kuro002_007.png")
sets(EV,1.5,1.5)
setp(EV,-960,0)
fade(0.3)
winopen(0.5)


::block_00065::
cls1()
setname("透")
text("冷静点……没事的")


::block_00066::
cls1()
setname("黑")
playVoice("KU_0614_0017.ogg")
text("（嗯……背部被抚摸着……嗯呼，感觉真好）")


::block_00067::
cls1()
setname("透")
text("（要继续吗？）")


::block_00068::
cls1()
setname("黑")
playVoice("KU_0614_0018.ogg")
text("（嗯……想要继续）")


::block_00069::
cls1()
noname()
text("黑微微地点了点头。")


::block_00070::
cls1()
noname()
text("在得到这个回应后，继续抚摸她的背部。")


::block_00071::
cls1()
noname()
text("她似乎稍微放松了一些。")


::block_00072::
cls1()
setname("黑")
playVoice("KU_0614_0019.ogg")
text("（呼……嗯，嗯……）")


::block_00073::
goto block_00088 --共通へ


::block_00074::
winopen(0.5)

::block_00075::
cls1()
setname("透")
text("（黑，张开嘴）")


capture()
alldel()
set(EV,"ev-H-kuro002_006.png")
sets(EV,1.5,1.5)
setp(EV,-960,0)
fade(0.3)


::block_00076::
cls1()
setname("黑")
playVoice("KU_0614_0020.ogg")
text("（诶？……嗯噗！？）")


::block_00077::
cls1()
noname()
text("唇刚碰上不久，就把自己的舌头缠上了黑的舌头。")


::block_00078::
cls1()
noname()
text("黑似乎很惊讶，但很快也同样地缠了回来。")


::block_00079::
cls1()
setname("黑")
playVoice("KU_0614_0021.ogg")
text("（嗯，咧噜……呼，啊啊，嗯……咧噜～……头脑……变得模糊了……咧噜）")


::block_00080::
goto block_00088 --共通へ


::block_00081::
capture()
alldel()
set(EV,"ev-H-kuro002_007.png")
sets(EV,1.5,1.5)
setp(EV,-960,0)
fade(0.3)
winopen(0.5)


::block_00082::
cls1()
setname("黑")
playVoice("KU_0614_0022.ogg")
text("（嗯，嘶！？）")


::block_00083::
cls1()
noname()
text("用手指隔着衣服探寻到黑的乳头位置。")


::block_00084::
cls1()
setname("黑")
playVoice("KU_0614_0023.ogg")
text("呼，啊啊……！　嗯，那儿，啊……啊，嗯呜……")


::block_00085::
cls1()
setname("透")
text("（我觉得有点刺激会让你更放松）")


::block_00086::
cls1()
setname("黑")
playVoice("KU_0614_0024.ogg")
text("（可能……是吧……嗯，咕，虽然不确定……哈啊，啊，呜，呼呜……嗯嗯……！）")


::block_00087::
cls1()
setname("黑")
playVoice("KU_0614_0025.ogg")
text("（感觉太好了……嗯，嗯咕……声音……嗯，哈啊……忍不住出来了……！）")


::block_00088::

winclose(0.5)

::block_00089::
item={}
item[1]="頭を撫でる"
item[2]="手マン"
cls1()
noname()
text("选项1：抚摸着头\n选项2：手淫\n")
sel("",item)
ret=get_sel_result()
InmoSyuzinko = InmoSyuzinko + getInmo('A',3,item[ret])
IsPresentKuro = getAttend('A',3,item[ret])
if ret==1 then goto block_00090 end
if ret==2 then goto block_00105 end


::block_00090::
capture()
alldel()
set(EV,"ev-H-kuro002_005.png")
fade(0.5)
winopen(0.5)


::block_00091::
cls1()
setname("透")
text("（乖乖的……放松点……快到车站了）")


::block_00092::
cls1()
setname("黑")
playVoice("KU_0614_0026.ogg")
text("（嗯……嗯嗯）")


::block_00093::
cls1()
noname()
text("用整个手掌传递温暖地抚摸她的头，黑微微动了一下。")


::block_00094::
cls1()
setname("黑")
playVoice("KU_0614_0027.ogg")
text("（虽然冷静下来了……但是……还想要更多……）")


::block_00095::
cls1()
setname("透")
text("（更多？）")


::block_00096::
cls1()
setname("黑")
playVoice("KU_0614_0028.ogg")
text("（……不、还是算了……没什么）")


::block_00097::
cls1()
noname()
text("黑有些丢人地缩了缩肩膀。")


::block_00098::
cls1()
noname()
text("想要更多抚摸吗？")


::block_00099::
cls1()
noname()
text("还是说，她想要更刺激的东西呢？")


::block_00100::
cls1()
setname("透")
text("乖乖的")


::block_00101::
cls1()
setname("黑")
playVoice("KU_0614_0029.ogg")
text("（嗯……呼，唔……有点平静下来了……又有点焦急……嗯呼）")


::block_00102::
cls1()
noname()
text("只是摸摸头，效果不太明显……吗？")


::block_00103::
cls1()
noname()
text("还是说，让她习惯这种程度的刺激会更好呢？")


::block_00104::
goto block_00170 --末端へ


::block_00105::
playSe("se_エッチ_くちゅ音.ogg")
capture()
alldel()
set(EV,"ev-H-kuro002_009.png")
fade(0.5)
winopen(0.5)


::block_00106::
cls1()
setname("黑")
playVoice("KU_0614_0030.ogg")
text("（嗯、啊……？）")


::block_00107::
cls1()
noname()
text("手伸进黑的裙子里，甚至深入了内裤中。")


::block_00108::
cls1()
setname("透")
text("（不这么做的话，我觉得症状可能不会好转）")


playBgv("se_エッチ_水音_遅_ループ.ogg",true)


::block_00109::
cls1()
setname("黑")
playVoice("KU_0614_0031.ogg")
text("（嗯，呼……可能、是这样吧……但是，这里，嗯嗯……在电车、里面啊……）")


::block_00110::
cls1()
setname("黑")
playVoice("KU_0614_0032.ogg")
text("（这样、的话，嗯，唔，会被、啊……会被人看到的话……啊啊……！）")


::block_00111::
cls1()
setname("透")
text("（没事的。没人注意到的）")


::block_00112::
cls1()
noname()
text("尽量温柔地耳语着，用手指继续玩弄黑的缝隙。")


::block_00113::
cls1()
noname()
text("用指腹摩擦阴蒂，有时也把手指伸入阴道口中。")


::block_00114::
cls1()
setname("黑")
playVoice("KU_0614_0033.ogg")
text("（哈啊……啊，嗯……唔，呼，好舒服……那个，哈……那里，嗯嗯……）")


::block_00115::
cls1()
setname("透")
text("阴蒂，这样可以吗？还是要再快一点？")


::block_00116::
cls1()
setname("黑")
playVoice("KU_0614_0034.ogg")
text("再、快一点……")


::block_00117::
cls1()
setname("透")
text("知道了")


::block_00118::
cls1()
noname()
text("黑的希望下，手指的动作更快了。")


stopBgv()
playBgv("se_エッチ_水音_速_ループ.ogg",true)


::block_00119::
cls1()
noname()
text("用手指拨动阴蒂，带来了比之前更强烈的刺激。")


::block_00120::
cls1()
setname("黑")
playVoice("KU_0614_0035.ogg")
text("（哈，啊……嗯，声音，啊……要出来了……）")


::block_00121::
cls1()
setname("黑")
playVoice("KU_0614_0036.ogg")
text("（如果被，听，听到了，啊，啊……不行，可是……）")


::block_00122::
cls1()
setname("透")
text("（黑的身体，随着我的手指在颤抖）")


::block_00123::
cls1()
setname("黑")
playVoice("KU_0614_0037.ogg")
text("（因、因为……感觉，好舒服……嗯，呜……身体，自、自己在……嗯，呼……）")


::block_00124::
cls1()
setname("透")
text("（小穴，如果这么舒服的话，希望你能好好说出来）")


::block_00125::
cls1()
setname("黑")
playVoice("KU_0614_0038.ogg")
text("（好、好好地，说……嗯啊……！）")


::block_00126::
cls1()
setname("透")
text("（来，说出来）")


::block_00127::
cls1()
setname("黑")
playVoice("KU_0614_0039.ogg")
text("（啊，呜……小、小穴……啊……小穴……感觉，好舒服……啊，呼啊……！）")


::block_00128::
cls1()
noname()
text("黑在电车里说出了下流的话。")


::block_00129::
cls1()
noname()
text("这样的刺激很新鲜。无论如何都让人兴奋起来。")


::block_00130::
cls1()
setname("黑")
playVoice("KU_0614_0040.ogg")
text("哈……啊……如果就这样被、啊……继续的话……唔，嗯啊……！")


::block_00131::
cls1()
setname("透")
text("小穴，要去了？")


::block_00132::
cls1()
setname("黑")
playVoice("KU_0614_0041.ogg")
text("嗯、嗯……要去、去了……啊，小穴，要、要去了，嗯，呼啊，小穴，好像要去了")


::block_00133::
cls1()
noname()
text("黑的身体颤抖得更加厉害了。")


::block_00134::
cls1()
noname()
text("如果继续这样下去，似乎能让她高潮，不过故意逗她一下也可能挺有趣。")


::block_00135::
cls1()
noname()
text("快到站了，该怎么办呢。")


::block_00136::
winclose(0.5)

::block_00137::
item={}
item[1]="イかせる"
item[2]="イかせない"
cls1()
noname()
text("选项1：让她高潮\n选项2：不让她高潮\n")
sel("",item)
ret=get_sel_result()
InmoSyuzinko = InmoSyuzinko + getInmo('A',4,item[ret])
IsPresentKuro = getAttend('A',4,item[ret])
if ret==1 then goto block_00138 end
if ret==2 then goto block_00153 end


::block_00138::
winopen(0.5)

::block_00139::
cls1()
noname()
text("不，这是为了让黑冷静下来才这么做的。")


::block_00140::
cls1()
noname()
text("如果快要高潮了，那就应该让她继续高潮吧。")


fade_set(EV,"ev-H-kuro002_010.png",0.3)


::block_00141::
cls1()
setname("黑")
playVoice("KU_0614_0042.ogg")
text("（嗯，呜啊……！？）")


::block_00142::
cls1()
noname()
text("加速手指的动作，进行最后的冲刺。")


::block_00143::
cls1()
noname()
text("轻轻压住阴蒂，同时把手指伸进小穴里，湿润地搅动着。")


::block_00144::
cls1()
setname("黑")
playVoice("KU_0614_0043.ogg")
text("（嗯呜，啊，要、要去了……啊，已经……忍不住，嗯，不行了，哎……极、限了……！）")


::block_00145::
cls1()
setname("透")
text("（如果快要去了，就好好说小穴要去了）")


::block_00146::
cls1()
setname("黑")
playVoice("KU_0614_0044.ogg")
text("啊……啊！　要去了！　小穴……小、小穴，要去了……！！")


stopBgv()
winclose(0.1)
set(EF,"white.png")
white()
fade(0)
playSe("se_エッチ_性器を開く.ogg")
capture()
del(EF)
set(EV,"ev-H-kuro002_010.png")
set(EF,"ev-H-kuro002_901.png")
fade(0.5)
winopen(0.5)


::block_00147::
cls1()
noname()
text("黑的身体猛地一震。")


::block_00148::
cls1()
noname()
text("插在小穴里的手指被紧紧夹住，同时从深处流出了爱液。")


::block_00149::
cls1()
setname("黑")
playVoice("KU_0614_0045.ogg")
text("（哈，啊……呃，呼……。　小穴……去了……啊）")


::block_00150::
cls1()
noname()
text("看起来她好好地去了。")


::block_00151::
cls1()
noname()
text("接下来，希望她能冷静下来……。")


::block_00152::
goto block_SEL1


::block_00153::
winopen(0.5)

::block_00154::
cls1()
noname()
text("虽然对黑有些不太好，但在这里让她去实在是太可惜了。")


::block_00155::
cls1()
noname()
text("故意就这样焦着，让我能多看看黑可爱地扭动的样子。")


::block_00156::
cls1()
noname()
text("这样的欲望在心中萌生。")


fade_set(EV,"ev-H-kuro002_010.png",0.3)


::block_00157::
cls1()
setname("黑")
playVoice("KU_0614_0046.ogg")
text("（透，君……想、想去……拜、托）")


::block_00158::
cls1()
setname("透")
text("（…………）")


::block_00159::
cls1()
noname()
text("看着泪眼汪汪向我诉说的黑，我的背后悸动不已。")


::block_00160::
cls1()
noname()
text("我……可能喜欢黑这样的表情……。")



::block_00170::

if IsPresentKuro >= 1
then
goto block_SEL1
end


::block_00161::
cls1()
setname("透")
text("（啊，到站了呢）")


::block_00162::
cls1()
setname("黑")
playVoice("KU_0614_0122.ogg")
text("（…………）")


::block_00163::
cls1()
noname()
text("听到我的话，黑露出了遗憾的表情。")


::block_00164::
cls1()
setname("透")
text("（还没冷静下来？）")


::block_00165::
cls1()
setname("黑")
playVoice("KU_0614_0123.ogg")
text("嗯……对、不起")


::block_00166::
cls1()
setname("透")
text("（不用道歉。这不是黑的错）")


::block_00167::
cls1()
noname()
text("……说到底，这完全是我的错。")


::block_00168::
cls1()
setname("透")
text("（下了电车后，马上继续吧）")


::block_00169::
cls1()
setname("黑")
playVoice("KU_0614_0124.ogg")
text("（……嗯。拜托了……）")


goto block_SEL1






::block_SEL1::
stopSe()
stopBgv()
fadeBgm(1)
winclose(0.5)
capture()
alldel()
set(EF,"black.png")
fade(1)
stopSe()
wait(1)

goscript("06_トイレ_判定■.lua")


end

